From: Kim F. Storm Date: Fri, 30 Apr 2004 21:38:23 +0000 (+0000) Subject: (kill-ring-save): If region face background color is X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~22814 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=a52327627c5e8ba268bb35500228bf87bb6366a1;p=emacs.git (kill-ring-save): If region face background color is unspecified (if no highlighting), show extent of fully visible region even if transient-mark-mode is enabled. --- diff --git a/lisp/simple.el b/lisp/simple.el index 80c16726c50..b32d2408880 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2144,7 +2144,8 @@ visual feedback indicating the extent of the region being copied." ;; look like a C-g typed as a command. (inhibit-quit t)) (if (pos-visible-in-window-p other-end (selected-window)) - (unless transient-mark-mode + (unless (and transient-mark-mode + (face-background 'region)) ;; Swap point and mark. (set-marker (mark-marker) (point) (current-buffer)) (goto-char other-end)